Namespace BAL.Externo
	Public Class Persona
		Public Function Listar() As DataTable
			Dim _dal As New DAL.Externo.Persona
			Return _dal.Listar()
		End Function
		Public Function Listar_Naturales(ByVal _Parametros As Object()) As DataTable
			Dim _dal As New DAL.Externo.Persona
			Return _dal.Listar_Naturales(_Parametros)
		End Function
		Public Function Listar_Juridicas() As DataTable
			Dim _dal As New DAL.Externo.Persona
			Return _dal.Listar_Juridicas
		End Function
	End Class
End Namespace